
knitr::opts_chunk$set(collapse = T, comment = "#>")
options(
  tibble.print_min = 5L,
  tibble.print_max = 5L,
  digits = 2
)

set.seed(1014)
